﻿Public Class CT_HoaDon_DTO
    Private _MaHD As Integer
    Private _MaSach As Integer
    Private _SoLuongMua As Long
    Private _DonGia As Double
    Private _ThanhTien As Double

    Public Property MaHD() As Integer
        Get
            Return _MaHD
        End Get
        Set(ByVal value As Integer)
            _MaHD = value
        End Set
    End Property


    Public Property MaSach() As Integer
        Get
            Return _MaSach
        End Get
        Set(ByVal value As Integer)
            _MaSach = value
        End Set
    End Property

    Public Property SoLuongMua() As Long
        Get
            Return _SoLuongMua
        End Get
        Set(ByVal value As Long)
            _SoLuongMua = value
        End Set
    End Property

    Public Property DonGia() As Double
        Get
            Return _DonGia
        End Get
        Set(ByVal value As Double)
            _DonGia = value
        End Set
    End Property

    Public Property ThanhTien() As Double
        Get
            Return _ThanhTien
        End Get
        Set(ByVal value As Double)
            _ThanhTien = value
        End Set
    End Property

    Public Sub New(ByVal mas As Integer, ByVal sl As Long, ByVal dg As Double, ByVal tt As Double)
        MaSach = mas
        SoLuongMua = sl
        DonGia = dg
        ThanhTien = tt
    End Sub
End Class
